home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / The World of Computer Software.iso / copyx23.zip / DIRDEL.BAT < prev    next >
DOS Batch File  |  1992-09-16  |  982b  |  39 lines
  1.   @ECHO OFF
  2.   REM   - DIRDEL MAY BE USED FREE OF ANY CHARGE
  3.   REM   - DIRDEL is Copyrighted, 1992 by Dixie Aire Computer Services, Inc.
  4.   REM   -     All rights are reserved
  5.  
  6.   IF .%1 == .a: GOTO DOIT
  7.   IF .%1 == .A: GOTO DOIT
  8.   IF .%1 == .b: GOTO DOIT
  9.   IF .%1 == .B: GOTO DOIT
  10.   IF .%1 == .c: GOTO BLONDE
  11.   IF .%1 == .C: GOTO BLONDE
  12.   IF .%1 == .d: GOTO BLONDE
  13.   IF .%1 == .D: GOTO BLONDE
  14.   IF .%1 == .e: GOTO BLONDE
  15.   IF .%1 == .E: GOTO BLONDE
  16.   GOTO ERROR
  17.  
  18. :DOIT
  19.   dir %1
  20.   echo  
  21.   tbu -c _d  "Erase %1 ?  [Y/N]" yn
  22.   if "%_D%" == "N" GOTO END
  23.   ECHO Y|DEL %1\*.* >nul
  24.   GOTO END
  25.  
  26. :BLONDE
  27.   echo  
  28.   ECHO Come on Bimbo! .. WAKE UP!   You just tried to erase the hard drive!
  29.   echo  
  30.  
  31. :ERROR
  32.   ECHO Instructions: DIRDEL will erase complete diskettes after listing the files.
  33.   ECHO  
  34.   ECHO               DIRDEL A: will erase all files on the floppy in A:.
  35.   ECHO                        - Confirmation is used! -
  36.   ECHO  
  37. :END
  38.   free %1
  39.